home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PCMania 40
/
PCMania CD40_1.iso
/
render40
/
oca_a
/
mesa.inc
< prev
next >
Wrap
Text File
|
1995-10-03
|
4KB
|
237 lines
#include "shapes.inc"
#include "texturas.inc"
#declare Bound_Mesa = box {
<-1.0, -1.0, -1.0>, <1.0, 1.0, 1.0>
no_shadow
scale <6.127954, 5.000000, 3.189624>
translate <0.000, -1.000, 2.00>
}
#declare PATAIZQ1 = cylinder {
<0,0,1>, <0,0,0>, 1
texture {
Verde_silla
}
scale <0.500, 0.500, 2.000>
translate <-4.500, -4.000, -1.00>
}
#declare PATADERCH1 = cylinder {
<0,0,1>, <0,0,0>, 1
texture {
Verde_silla
}
scale <0.500, 0.500, 2.00>
translate <4.500, -4.000, -1.00>
}
#declare PATACURVAIZQ1 = torus {
1.500, 0.500 // Major, minor radius
rotate -x*90
texture {
Verde_silla
}
rotate <-90.0, 0.00, 0.00>
translate <-3.00, -4.00, 1.00>
}
#declare CORTEIZQ1 = plane {
z,0
texture {
Verde_silla
}
rotate <0.000, -270.000, 0.000>
translate <-3.000, -4.00, 0.00>
}
#declare PATACURVADERCH1 = torus {
1.500, 0.500 // Major, minor radius
rotate -x*90
texture {
Verde_silla
}
rotate <-90.00, 0.000, 0.00>
translate <3.000, -4.00, 1.00>
}
#declare CORTEDERCH1 = plane {
z,0
texture {
Verde_silla
}
rotate <0.00, -90.000, 0.00>
translate <3.000, -4.00, 0.00>
}
#declare CORTEIZQDERCH1 = plane {
z,0
texture {
Verde_silla
}
rotate <0.00, -180.00, 0.00>
translate <0.000, -4.00, 1.00>
}
#declare CURVACORTADAIZQ1 = intersection {
object { PATACURVAIZQ1 }
object { CORTEIZQDERCH1 }
object { CORTEIZQ1 }
texture {
Verde_silla
}
}
#declare CURVACORTADADERCH1 = intersection {
object { PATACURVADERCH1 }
object { CORTEDERCH1 }
object { CORTEIZQDERCH1 }
texture {
Verde_silla
}
}
#declare UNEPATA = cylinder {
<0,0,1>, <0,0,0>, 1
texture {
Verde_silla
}
scale <0.50, 0.50, 6.00>
rotate <0.000, -90.000, 0.00>
translate <3.00, -4.00, 2.500>
}
#declare DELANTERA = union {
object { PATAIZQ1 }
object { PATADERCH1 }
object { CURVACORTADAIZQ1 }
object { CURVACORTADADERCH1 }
object { UNEPATA }
texture {
Verde_silla
}
}
#declare PATAIZQ2 = cylinder {
<0,0,1>, <0,0,0>, 1
texture {
Verde_silla
}
scale <0.50, 0.50, 2.000>
translate <-4.50, -4.00, -1.00>
}
#declare PATADERCH2 = cylinder {
<0,0,1>, <0,0,0>, 1
texture {
Verde_silla
}
scale <0.50, 0.500, 2.000>
translate <4.50, -4.00, -1.00>
}
#declare PATACURVAIZQ2 = torus {
1.500, 0.500 // Major, minor radius
rotate -x*90
texture {
Verde_silla
}
rotate <-90.00, 0.000, 0.00>
translate <-3.00, -4.000, 1.00>
}
#declare CORTEIZQ2 = plane {
z,0
texture {
Verde_silla
}
rotate <0.00, -270.00, 0.00>
translate <-3.00, -4.0, 0.00>
}
#declare PATACURVADERCH2 = torus {
1.500, 0.500 // Major, minor radius
rotate -x*90
texture {
Verde_silla
}
rotate <-90.00, 0.000, 0.00>
translate <3.00, -4.00, 1.0>
}
#declare CORTEDERCH2 = plane {
z,0
texture {
Verde_silla
}
rotate <0.0, -90.00, 0.00>
translate <3.0, -4.0, 0.0>
}
#declare CORTEIZQDERCH2 = plane {
z,0
texture {
Verde_silla
}
rotate <0.0, -180.0, 0.0>
translate <0.0, -4.0, 1.0>
}
#declare CURVACORTADAIZQ2 = intersection {
object { PATACURVAIZQ2 }
object { CORTEIZQDERCH2 }
object { CORTEIZQ2 }
texture {
Verde_silla
}
}
#declare CURVACORTADADERCH2 = intersection {
object { PATACURVADERCH2 }
object { CORTEDERCH2 }
object { CORTEIZQDERCH2 }
texture {
Verde_silla
}
}
#declare UNEPATA1 = cylinder {
<0,0,1>, <0,0,0>, 1
texture {
Verde_silla
}
scale <0.5, 0.50, 6.0>
rotate <0.00, -90.0, 0.0>
translate <3.0, -4.0, 2.5>
}
#declare TRASERA = union {
object { PATAIZQ2 }
object { PATADERCH2 }
object { CURVACORTADAIZQ2 }
object { CURVACORTADADERCH2 }
object { UNEPATA1 }
texture {
Verde_silla
}
translate <0.00, 5.0, 0.00>
}
#declare SUPERFIE = box {
<-1, -1, -1>, <1, 1, 1>
texture {
Mesa_Silla
}
scale <4.80, 3.800, 0.20>
translate <0.00, -1.50, 3.220>
}
#declare MESA = union {
object { DELANTERA }
object { TRASERA }
object { SUPERFIE }
bounded_by { Bound_Mesa }
scale <0.50, 0.500, 0.50>
}
#declare MESA2= MESA